/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / utilities / _customise / clocks / _clockdate / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 20 f4 20 3e | 21 52 75 6e 49 6d 61 67 |.... . >|!RunImag|
|00000010| 65 0d 00 14 14 20 f4 20 | 42 79 20 43 48 52 49 53 |e.... . |By CHRIS|
|00000020| 20 57 4f 4f 44 0d 00 1e | 06 20 f4 0d 00 28 04 0d | WOOD...|. ...(..|
|00000030| 00 32 3b f4 20 3e 53 6f | 72 72 79 20 61 62 6f 75 |.2;. >So|rry abou|
|00000040| 74 20 74 68 65 20 63 6f | 64 65 20 62 65 69 6e 67 |t the co|de being|
|00000050| 20 72 61 74 68 65 72 20 | 68 61 72 64 20 74 6f 20 | rather |hard to |
|00000060| 75 6e 64 65 72 73 74 61 | 6e 64 0d 00 3c 40 f4 20 |understa|nd..<@. |
|00000070| 3e 42 75 74 20 69 74 27 | 73 20 6d 79 20 66 72 69 |>But it'|s my fri|
|00000080| 65 6e 64 73 20 74 75 72 | 6e 20 74 6f 20 75 73 65 |ends tur|n to use|
|00000090| 20 74 68 65 20 50 72 6f | 67 72 61 6d 6d 65 72 73 | the Pro|grammers|
|000000a0| 20 52 65 66 65 72 65 6e | 63 65 0d 00 46 0f f4 20 | Referen|ce..F.. |
|000000b0| 3e 4d 61 6e 75 61 6c 73 | 21 0d 00 50 04 0d 00 5a |>Manuals|!..P...Z|
|000000c0| 0c ee 85 f2 65 72 72 6f | 72 0d 00 64 04 0d 00 6e |....erro|r..d...n|
|000000d0| 19 de 20 71 25 20 31 39 | 30 30 2c 20 64 61 74 61 |.. q% 19|00, data|
|000000e0| 32 25 20 32 30 30 0d 00 | 78 34 64 61 74 61 65 6e |2% 200..|x4dataen|
|000000f0| 64 32 25 3d 64 61 74 61 | 32 25 2b 32 30 30 3a 4e |d2%=data|2%+200:N|
|00000100| 61 6d 65 24 3d 22 43 6c | 6f 63 6b 2d 44 61 74 65 |ame$="Cl|ock-Date|
|00000110| 22 3a 71 75 69 74 25 3d | a3 3a 0d 00 82 35 c8 99 |":quit%=|.:...5..|
|00000120| 20 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 | "Wimp_I|nitialis|
|00000130| 65 22 2c 32 30 30 2c 26 | 34 42 35 33 34 31 35 34 |e",200,&|4B534154|
|00000140| 2c 4e 61 6d 65 24 20 b8 | 20 63 6c 6f 73 65 25 0d |,Name$ .| close%.|
|00000150| 00 8c 28 f2 74 65 6d 70 | 6c 61 74 65 73 3a f4 20 |..(.temp|lates:. |
|00000160| 50 52 4f 43 73 65 74 75 | 70 3a 50 52 4f 43 69 6e |PROCsetu|p:PROCin|
|00000170| 69 74 6d 65 6e 75 31 0d | 00 96 3c 58 3d 30 3a 59 |itmenu1.|..<X=0:Y|
|00000180| 3d 31 30 32 33 2d 31 36 | 30 3a f2 6f 70 65 6e 5f |=1023-16|0:.open_|
|00000190| 77 69 6e 64 6f 77 28 74 | 65 73 74 25 2c 58 2c 59 |window(t|est%,X,Y|
|000001a0| 2c 35 36 30 2b 58 2c 31 | 36 30 2b 59 2c 30 2c 30 |,560+X,1|60+Y,0,0|
|000001b0| 2c 30 29 0d 00 a0 05 3a | 0d 00 aa 78 21 71 25 3d |,0)....:|...x!q%=|
|000001c0| 74 65 73 74 25 3a 71 25 | 21 34 3d 30 3a c8 99 22 |test%:q%|!4=0:.."|
|000001d0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|000001e0| 65 22 2c 2c 71 25 3a 71 | 25 21 38 3d 30 3a 71 25 |e",,q%:q|%!8=0:q%|
|000001f0| 21 31 32 3d 30 3a 54 24 | 3d c2 91 24 2c 38 29 3a |!12=0:T$|=..$,8):|
|00000200| 54 24 3d c0 54 24 2c 35 | 29 3a 24 28 71 25 21 32 |T$=.T$,5|):$(q%!2|
|00000210| 38 29 3d 54 24 3a c8 99 | 22 57 69 6d 70 5f 53 65 |8)=T$:..|"Wimp_Se|
|00000220| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 3a |tIconSta|te",,q%:|
|00000230| 0d 00 b4 0d 6f 6c 64 74 | 69 6d 65 3d 30 0d 00 be |....oldt|ime=0...|
|00000240| 05 3a 0d 00 c8 27 c8 99 | 20 22 4f 53 5f 52 65 61 |.:...'..| "OS_Rea|
|00000250| 64 4d 6f 6e 6f 74 6f 6e | 69 63 54 69 6d 65 22 20 |dMonoton|icTime" |
|00000260| b8 20 6e 65 77 74 69 6d | 65 0d 00 d2 1f 20 c8 95 |. newtim|e.... ..|
|00000270| 20 28 6e 65 77 74 69 6d | 65 20 2d 20 6f 6c 64 74 | (newtim|e - oldt|
|00000280| 69 6d 65 29 20 3e 20 30 | 0d 00 dc 1d 20 20 20 20 |ime) > 0|....    |
|00000290| 20 20 6f 6c 64 74 69 6d | 65 3d 6f 6c 64 74 69 6d |  oldtim|e=oldtim|
|000002a0| 65 2b 31 30 30 0d 00 e6 | 06 20 ce 0d 00 f0 05 3a |e+100...|. .....:|
|000002b0| 0d 00 fa 08 20 d1 3d 30 | 0d 01 04 05 3a 0d 01 0e |.... .=0|....:...|
|000002c0| 05 f5 0d 01 18 28 c8 99 | 20 22 57 69 6d 70 5f 50 |.....(..| "Wimp_P|
|000002d0| 6f 6c 6c 49 64 6c 65 22 | 2c 30 2c 71 25 2c 6f 6c |ollIdle"|,0,q%,ol|
|000002e0| 64 74 69 6d 65 20 b8 20 | 41 25 0d 01 22 0c 20 c8 |dtime . |A%..". .|
|000002f0| 8e 20 41 25 20 ca 0d 01 | 2c 93 20 20 c9 20 30 20 |. A% ...|,.  . 0 |
|00000300| 20 20 20 20 3a e7 20 91 | 3e 31 30 30 20 8c 20 3a |    :. .|>100 . :|
|00000310| d1 3d 30 3a 21 71 25 3d | 74 65 73 74 25 3a 71 25 |.=0:!q%=|test%:q%|
|00000320| 21 34 3d 30 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |!4=0:.."|Wimp_Get|
|00000330| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 71 25 3a 71 |IconStat|e",,q%:q|
|00000340| 25 21 38 3d 30 3a 71 25 | 21 31 32 3d 30 3a 54 24 |%!8=0:q%|!12=0:T$|
|00000350| 3d c2 91 24 2c 38 29 3a | 54 24 3d c0 54 24 2c 35 |=..$,8):|T$=.T$,5|
|00000360| 29 3a 24 28 71 25 21 32 | 38 29 3d 54 24 3a c8 99 |):$(q%!2|8)=T$:..|
|00000370| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00000380| 74 65 22 2c 2c 71 25 3a | cd 0d 01 36 48 20 20 c9 |te",,q%:|...6H  .|
|00000390| 20 32 20 20 20 20 20 3a | f2 6f 70 65 6e 5f 77 69 | 2     :|.open_wi|
|000003a0| 6e 64 6f 77 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ndow(!q%|,q%!4,q%|
|000003b0| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|000003c0| 25 21 32 30 2c 71 25 21 | 32 34 2c 71 25 21 32 38 |%!20,q%!|24,q%!28|
|000003d0| 29 0d 01 40 3b 20 20 c9 | 20 36 20 20 20 20 20 3a |)..@;  .| 6     :|
|000003e0| f2 63 68 65 63 6b 6d 6f | 75 73 65 28 21 71 25 2c |.checkmo|use(!q%,|
|000003f0| 71 25 21 34 2c 71 25 21 | 38 2c 71 25 21 31 32 2c |q%!4,q%!|8,q%!12,|
|00000400| 71 25 21 31 36 2c 71 25 | 21 32 30 29 0d 01 4a 1b |q%!16,q%|!20)..J.|
|00000410| 20 20 c9 20 31 37 2c 31 | 38 20 3a f2 72 65 63 65 |  . 17,1|8 :.rece|
|00000420| 69 76 65 28 71 25 29 0d | 01 54 05 cb 0d 01 5e 0b |ive(q%).|.T....^.|
|00000430| fd 20 71 75 69 74 25 0d | 01 68 1d ff 28 22 43 48 |. quit%.|.h..("CH|
|00000440| 2e 20 31 20 57 61 76 65 | 53 79 6e 74 68 2d 42 65 |. 1 Wave|Synth-Be|
|00000450| 65 70 22 29 0d 01 72 1f | c8 99 20 22 57 69 6d 70 |ep")..r.|.. "Wimp|
|00000460| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 2c 63 6c 6f |_CloseDo|wn",,clo|
|00000470| 73 65 25 0d 01 7c 05 e0 | 0d 01 86 04 0d 01 90 0c |se%..|..|........|
|00000480| dd 20 f2 65 72 72 6f 72 | 0d 01 9a 0e ff 28 22 43 |. .error|.....("C|
|00000490| 4c 4f 53 45 22 29 0d 01 | a4 26 ff 28 22 43 48 41 |LOSE")..|.&.("CHA|
|000004a0| 4e 4e 45 4c 56 4f 49 43 | 45 20 31 20 57 61 76 65 |NNELVOIC|E 1 Wave|
|000004b0| 53 79 6e 74 68 2d 42 65 | 65 70 22 29 0d 01 ae 3a |Synth-Be|ep")...:|
|000004c0| 21 71 25 3d 9f 3a 24 28 | 71 25 2b 34 29 3d f6 24 |!q%=.:$(|q%+4)=.$|
|000004d0| 2b 22 20 28 69 6e 74 65 | 72 6e 61 6c 20 63 6f 64 |+" (inte|rnal cod|
|000004e0| 65 20 22 2b c3 9e 2b 22 | 2f 22 2b c3 7e 9f 2b 22 |e "+..+"|/"+.~.+"|
|000004f0| 29 2e 22 2b bd 30 0d 01 | b8 24 c8 99 20 22 57 69 |)."+.0..|.$.. "Wi|
|00000500| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00000510| 71 25 2c 31 2c 6e 61 6d | 65 24 0d 01 c2 19 c8 99 |q%,1,nam|e$......|
|00000520| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|00000530| 22 3a e0 0d 01 cc 05 e1 | 0d 01 d6 04 0d 01 e0 0f |":......|........|
|00000540| dd f2 74 65 6d 70 6c 61 | 74 65 73 0d 01 ea 32 c8 |..templa|tes...2.|
|00000550| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |. "Wimp_|OpenTemp|
|00000560| 6c 61 74 65 22 2c 2c 22 | 3c 4f 62 65 79 24 44 69 |late",,"|<Obey$Di|
|00000570| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 01 f4 |r>.Templ|ates"...|
|00000580| 40 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |@.. "Wim|p_LoadTe|
|00000590| 6d 70 6c 61 74 65 22 2c | 2c 71 25 2c 64 61 74 61 |mplate",|,q%,data|
|000005a0| 32 25 2c 64 61 74 61 65 | 6e 64 32 25 2c 2d 31 2c |2%,datae|nd2%,-1,|
|000005b0| 22 43 4c 4f 43 4b 44 41 | 54 45 22 2c 30 0d 01 fe |"CLOCKDA|TE",0...|
|000005c0| 41 71 25 21 32 34 3d 2d | 31 3a 71 25 21 32 38 3d |Aq%!24=-|1:q%!28=|
|000005d0| 71 25 21 32 38 20 84 20 | 25 31 30 3a c8 99 20 22 |q%!28 . |%10:.. "|
|000005e0| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|000005f0| 77 22 2c 2c 71 25 20 b8 | 20 74 65 73 74 25 0d 02 |w",,q% .| test%..|
|00000600| 08 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... "Wi|mp_Close|
|00000610| 54 65 6d 70 6c 61 74 65 | 22 0d 02 12 05 e1 0d 02 |Template|".......|
|00000620| 1c 04 0d 02 26 11 dd f2 | 72 65 63 65 69 76 65 28 |....&...|receive(|
|00000630| 71 25 29 0d 02 30 0e c8 | 8e 20 71 25 21 31 36 20 |q%)..0..|. q%!16 |
|00000640| ca 0d 02 3a 14 20 20 20 | c9 20 30 20 3a 20 71 75 |...:.   |. 0 : qu|
|00000650| 69 74 25 3d b9 0d 02 44 | 05 cb 0d 02 4e 05 e1 0d |it%=...D|....N...|
|00000660| 02 58 04 0d 02 62 3e dd | 20 f2 6f 70 65 6e 5f 77 |.X...b>.| .open_w|
|00000670| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 2c 78 30 |indow(ha|ndle%,x0|
|00000680| 25 2c 79 30 25 2c 78 31 | 25 2c 79 31 25 2c 73 63 |%,y0%,x1|%,y1%,sc|
|00000690| 78 25 2c 73 63 79 25 2c | 62 68 61 6e 64 6c 65 25 |x%,scy%,|bhandle%|
|000006a0| 29 0d 02 6c 11 e7 68 61 | 6e 64 6c 65 25 3d 2d 31 |)..l..ha|ndle%=-1|
|000006b0| 8c e1 0d 02 76 1f 71 25 | 21 30 3d 68 61 6e 64 6c |....v.q%|!0=handl|
|000006c0| 65 25 3a 71 25 21 32 38 | 3d 62 68 61 6e 64 6c 65 |e%:q%!28|=bhandle|
|000006d0| 25 0d 02 80 29 71 25 21 | 34 3d 78 30 25 3a 71 25 |%...)q%!|4=x0%:q%|
|000006e0| 21 38 3d 79 30 25 3a 71 | 25 21 31 32 3d 78 31 25 |!8=y0%:q|%!12=x1%|
|000006f0| 3a 71 25 21 31 36 3d 79 | 31 25 0d 02 8a 19 71 25 |:q%!16=y|1%....q%|
|00000700| 21 32 30 3d 73 63 78 25 | 3a 71 25 21 32 34 3d 73 |!20=scx%|:q%!24=s|
|00000710| 63 79 25 0d 02 94 1c c8 | 99 20 22 57 69 6d 70 5f |cy%.....|. "Wimp_|
|00000720| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 71 25 0d |OpenWind|ow",,q%.|
|00000730| 02 9e 05 e1 0d 02 a8 04 | 0d 02 b2 37 dd 20 f2 63 |........|...7. .c|
|00000740| 68 65 63 6b 6d 6f 75 73 | 65 28 6d 6f 75 73 65 78 |heckmous|e(mousex|
|00000750| 25 2c 6d 6f 75 73 65 79 | 25 2c 62 25 2c 68 61 6e |%,mousey|%,b%,han|
|00000760| 64 6c 65 25 2c 69 63 6f | 6e 25 2c 6f 62 25 29 0d |dle%,ico|n%,ob%).|
|00000770| 02 bc 0f e7 20 62 25 3d | 32 20 8c 20 3a e1 0d 02 |.... b%=|2 . :...|
|00000780| c6 22 e7 20 62 25 3d 37 | 20 8c 20 c8 99 20 22 57 |.". b%=7| . .. "W|
|00000790| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 3a e0 |imp_Clos|eDown":.|
|000007a0| 0d 02 d0 11 e7 20 62 25 | 3d 31 84 62 25 3e 32 20 |..... b%|=1.b%>2 |
|000007b0| 8c 0d 02 da 10 20 20 c8 | 8e 20 69 63 6f 6e 25 20 |.....  .|. icon% |
|000007c0| ca 0d 02 e4 0c 20 20 c9 | 20 30 2c 31 3a 0d 02 ee |.....  .| 0,1:...|
|000007d0| 2e cb 3a cd 3a f2 75 70 | 64 61 74 65 28 68 61 6e |..:.:.up|date(han|
|000007e0| 64 6c 65 25 2c 71 25 21 | 34 2c 71 25 21 38 2c 71 |dle%,q%!|4,q%!8,q|
|000007f0| 25 21 31 32 2c 71 25 21 | 31 36 29 0d 02 f8 05 e1 |%!12,q%!|16).....|
|00000800| 0d 03 02 04 0d 03 0c 2a | dd 20 f2 75 70 64 61 74 |.......*|. .updat|
|00000810| 65 28 68 61 6e 64 6c 65 | 25 2c 75 78 30 25 2c 75 |e(handle|%,ux0%,u|
|00000820| 79 30 25 2c 75 78 31 25 | 2c 75 79 31 25 29 0d 03 |y0%,ux1%|,uy1%)..|
|00000830| 16 39 21 71 25 3d 68 61 | 6e 64 6c 65 25 3a 71 25 |.9!q%=ha|ndle%:q%|
|00000840| 21 34 3d 75 78 30 25 3a | 71 25 21 38 3d 75 79 30 |!4=ux0%:|q%!8=uy0|
|00000850| 25 3a 71 25 21 31 32 3d | 75 78 31 25 3a 71 25 21 |%:q%!12=|ux1%:q%!|
|00000860| 31 36 3d 75 79 31 25 0d | 03 20 13 71 25 21 32 30 |16=uy1%.|. .q%!20|
|00000870| 3d 30 3a 71 25 21 32 34 | 3d 30 0d 03 2a 26 c8 99 |=0:q%!24|=0..*&..|
|00000880| 20 22 57 69 6d 70 5f 55 | 70 64 61 74 65 57 69 6e | "Wimp_U|pdateWin|
|00000890| 64 6f 77 22 2c 2c 71 25 | 20 b8 20 6d 6f 72 65 25 |dow",,q%| . more%|
|000008a0| 0d 03 34 05 e1 0d 03 3e | 04 0d 03 48 17 dd f2 63 |..4....>|...H...c|
|000008b0| 6c 6f 73 65 5f 77 69 6e | 64 6f 77 28 21 71 25 29 |lose_win|dow(!q%)|
|000008c0| 0d 03 52 1d c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |..R... "|Wimp_Clo|
|000008d0| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 71 25 0d 03 5c |seWindow|",,q%..\|
|000008e0| 2b e7 20 21 71 25 3d 74 | 65 73 74 25 20 8c 20 3a |+. !q%=t|est% . :|
|000008f0| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. "Wimp|_CloseDo|
|00000900| 77 6e 22 3a e0 20 20 8b | 0d 03 66 05 e1 0d ff    |wn":.  .|..f.... |
+--------+-------------------------+-------------------------+--------+--------+